#lang racket

(require "stream-basics.rkt")

(define (display-line x)
  (display x)
  (newline))

(define (show x)
  (display-line x)
  x)

;0
(define x (stream-map show (stream-enumerate-interval 0 10)))
(display "x already defined\n")

;1
;2
;3
;4
;5
(stream-ref x 5)

;6
;7
(stream-ref x 7)